home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 026-050 / scopedisk29 / earthq / eq.c < prev    next >
C/C++ Source or Header  |  1995-03-18  |  774b  |  33 lines
  1. echo ; /*  Note that this declares an int available externally
  2.  lc -cwusf -v -sc=__MERGED -M -y EQ.c
  3.  blink EQ.o LIB lib:amiga.lib DEFINE _stdout=_echo SD SC ND VERBOSE
  4.  quit
  5. */
  6.  
  7. #include "exec/types.h"
  8. #include "exec/exec.h"
  9. #include "exec/execbase.h"
  10. #include "libraries/dos.h"
  11. #include "proto/exec.h"
  12. #include "proto/dos.h"
  13.  
  14. struct DosLibrary   *DOSBase;
  15.  
  16. int    printf(char *,);
  17.  
  18. #define ABSEXECBASE ((struct ExecBase **)4L)
  19.  
  20. void EQ()    /* CLI EarthQuake     M.E.S.   88-07-02   */
  21. {
  22.     int i;
  23.     if (!(DOSBase = (struct DosLibrary *)OpenLibrary("dos.library",0)))
  24.         return;
  25.     echo = (int)Output();
  26.     for (i=0;i < 10; i++)
  27.         {
  28.          printf("\033[E\033[T");
  29.         }
  30.     printf("cli Earthquake by \033[2;3mMark Schretlen\033[0m\n");
  31.     return;
  32. }
  33.